(set #translation_msg "Wer Interesse am Erzeugen einer Katalog-Datei für eine andere Sprache hat, kann MUIRequestString.ct als Ausgangsbasis verwenden oder mich kontakten.")
)
; else use English version
(
(set #osversion_msg "Incorrect OS version (software requires OS 39 or better) !")
(set #onerror_msg "An error has occurred during installation. Please check the log file to understand the error.")
(set #general_copyfiles_prompt "Select file(s) to be copied to...")
(set #general_askbool_yes "Yes")
(set #general_askbool_no "No")
(set #executable_askdir_prompt "Please choose the destination path for the MUIRequestString executable...")
(set #executable_askdir_help "It's recommended that you choose a destination that is in your path, most reasonably C: .")
(set #documentation_askbool_prompt "Would you like the AmigaGuide/PowerGuide documentation to be installed ?")
(set #documentation_askbool_help "Only English documentation available for now.")
(set #documentation_askdir_prompt "Please choose the destination path for the documentation...")
(set #translation_msg "If you are interested in creatung a catalog file for another language you can use MUIRequestString.ct as a basis or contact me.")
)
)
; check if we are running under correct OS
(if (< (/ (getversion) 65536) 39)
(
(abort #osversion_msg)
)
)
; error handling
(onerror
(if (> @ioerr 0)
(
(message
(#onerror_msg)
(set @default-dest "")
)
)
)
(exit (quiet))
)
; normal installation
(
(welcome)
; --- insert your code below ---
(set @default-dest
(askdir
(prompt #executable_askdir_prompt)
(help #executable_askdir_help)
(default "C:")
)
)
(copyfiles
(prompt #general_copyfiles_prompt @default-dest)
(help "")
(source "MUIRequestString")
(dest @default-dest)
(confirm)
(optional "fail")
)
(set #result
(askbool
(prompt #documentation_askbool_prompt)
(help #documentation_askbool_help)
(choices
#general_askbool_yes ;1
#general_askbool_no ;0
)
(default 1)
)
)
(if (= #result 1) ;Yes
(
(set @default-dest
(askdir
(prompt #documentation_askdir_prompt)
(help #documentation_askdir_help)
(default "HELP:English")
)
)
(copyfiles
(prompt #general_copyfiles_prompt @default-dest)
(help #documentation_copyfiles_help)
(source "Docs/English")
(all)
(dest @default-dest)
(confirm)
(optional "fail")
)
)
)
(set #result
(askbool
(prompt #catalogs_askbool_prompt)
(help #catalogs_askbool_help)
(choices
"Yes" ;1
"No" ;0
)
(default 1)
)
)
(if (= #result 1) ;Yes
(
(set #result
(askoptions
(prompt #catalogs_askoptions_prompt)
(help #catalogs_askoptions_help)
(choices
"Deutsch"
;"Zwei"
;"Drei"
)
(default 0)
)
)
(set #firstchoice (NOT (IN #result 0)))
;(set #secondchoice (NOT (IN #result 1)))
;(set #thirdchoice (NOT (IN #result 2)))
;(if #firstchoice then (message "Nr.1 selektiert !"))
;(if #secondchoice then (message "Nr.2 selektiert !"))
;(if #thirdchoice then (message "Nr.3 selektiert !"))
(if #firstchoice then ; word ´then must be provided ! else error